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1. Overview 



The 1.3.1 Release adds the Overlay/Under planes andPfflGS stereo function- 
ality to the ESV Workstation. The 13.1 Release Notes are arranged as fol- 
lows: 

• Chapter 1, ''Overview" (this chapter) describes the X.1 1 Overlay Ex- 
tension and PHIGS stexeo implementation. 

• Chapter 2, "Known Bugs in the System," describes the ES/PSX and 
ES/PEX bugs that have been fixed in the 1.3.1 Release. 

• Chapter 3, '"Documentation Corrections," describes additions and 
corrections to the ESV Workstation documentation. 

• Chapter 4, "Installation Instructions," describes the installation proce- 
dure for the 1.3.1 Release tape. 

• Appendix A, "PHIGS Stereo Example Program," contains the code 
listing for a PHIGS stereo example which is included on the 1.3.1 Re- 
lease tape. 
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X.11 Overlay Extension ^ 

The X. 1 1 Overlay Extension provides easy access to the ES V Workstation 
overlay hardware. An example program that demonstrates the use of overlay 
planes on the ESV Workstation will be found in 
/usr/peopie/fstest/demo/overtayx. 

X AllocOverlay Planes 

Status 

XAllocOverlayP lanes (dpy, win, planes) 

Display *dpy; 

Window win; 

unsigned int planes; 

Allocate overlay planes for a specific window. 

On the ESV Workstation, the total number of overlay planes is 4. These 
planes are shared with planes that identify PHIGS workstations. Each plane 
allocated for overlay reduces the total number of PHIGS workstations by one- 
half. If all 4 are allocated for overlay, a maximum number of 12 PHIGS 
workstations will be available. They can be allocated for overlay from 1 to 4. 

If too many planes are requested or no planes can be allocated, a ^ 

BadVaiue or BadAIIoc error is returned, f 

Valid pixel values for the window will be to (2"-1 ), where n is the 
number of overlay planes. 

XFreeOverlayPlanes 

Status 

XFreeOverlayPlanes (dpy, win) 

Display *dpy; 

Window win; 

Free all the overlay planes allocated for this window. This makes the 
resource available for other applications. 
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XStoreOveiiayColor 



Status 

XStoreOverlayColor(dpy, win, colorcell) 

Display *dpy; 

Window win; 

XColor *colorcell; 

Set the color to be displayed by this pixel value in the overlay or coloimap 
associated with a window. This routine will return BadValue if the color of 
the pixel cannot be changed or the pixel is not a valid pixel for this window. 

Storing the color does not change the color displayed on the screen. To 
actually change the color, you have to install the overlay colormap. 

Pixel value (zero) is the transparent overlay color. 
XlnstallOvertayColormap 

Status 

XInstallOverlayColormap (dpy, win) 

Display *dpy; 

Window win; 

Load the overlay or coloimap for a window into the hardware colormap. 
XSelectLayer 

Status 

XSelectLayer (dpy, win f layer) 

Display *dpy; 

Window win; 

int layer; 

Select the layer in which following graphics commands will be done. 
Layer is overlay, 1 is the normal frame buffer. 
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Restrictions 



ESV does not support ALU operation in the overlay planes. This 
means that any X operation with an ALU mode other than GXcopy 
cannot be done. 

Any X operation that needs both a foreground and a background color 
will not work correctly. The foreground color will be written, but the 
background will not 

XGetimage will return the pixels in the currendy selected layer. The 
overlay image will be returned in the low order bits of 32 bit pixels. 
XGetimage does not work with overlay planes in the 1.3.1 Release. 

XPutlmage will work when overlay layers are selected. The image 
must be stored in the low order bits of 32 bit pixels. XPutlmage does 
not work with overlay planes in the 13. 1 Release. 
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PHIGS Stereo Implementation 

The ESV Workstation provides a method for creating stereo images through 
PHIGS. This method includes two separate "screens" in the X server, one for 
monoscopic applications and one for stereoscopic applications. The stereo 
application is responsible for setting up the stereoscopic fields in the view ta- 
ble and for opening the X connection to the stereo screen. Everything else is 
handled by the X server., 

Interface Overview 

The ESV Workstation contains a special screen in the X server to support ste- 
reoscopic applications. The stereo application must open a window some- 
where in the "stereo screen" (host:0;1 ). The user toggles between screens by 
moving the cursor off the left or right side of the screen. 

The stereo screen is 512 pixels high. If PHIGS graphics are displayed in 
this window, the system will traverse the graphics structure twice to display 
both stereoscopic fields. 

Using the PHIGS Viewing Model for Stereo 

The stereo application must create the left-eye and right-eye stereoscopic 
fields in the PHIGS view table. These views are used by the system during tra- 
versal. To tell the system which stereoscopic field should be used for each 
eye, a PHIGS GSE is provided, which is an extension of the 
SETJrtEW JNDEX element Rather than indicating a single index in the 
GSE, the application indicates three indices: one for left-eye, one for right- 
eye, and one for monoscopic viewing. 

The left-eye and right-eye views are established in the View Reference 
Coordinate (VRC) system in VRC coordinates, as shown in figure 1. Left and 
right are established by shifting the Projection Reference Point (PRP) off the 
VRC z-axis in the x-direction. Note that the viewing frustum is created by 
passing planes through the PRP and the corners of the viewing window, which 
is a rectangle on the viewing plane. 

The closer the PRP is to the viewing plane, the more severe the perspec- 
tive angle. The view window rectangle is specified by the window field in the 
Pviewmapping3 structure that is passed to pevaiviewmappingmatrix3. 
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Figure 1. View Reference Coordinate System 

The viewing plane coincides with the surface of the monitor screen, and 
the viewing window corresponds to the X window on the screen in which the 
graphics will be displayed. The following parameters should be carefully se- 
lected to create the best stereo image: 

• PEP z«vaiue (the distance between eyes and the monitor screen), 

• The size of the X window in which the 3D object is drawn, and 

• PRPx-value (the interocular separation). 

In the beginning of the example program in "Appendix B w , you will see a 
constant, INCHESJTO_VRC, which allows you to map physical inches to 
VRC distances. It is critical that real inches are comedy converted to units of 
VRC space, so that the stereoscopic fields are correctly calculated. 

/* Stereo paraxas in physical inches */ 

♦define EYE_TO_SCREEN 36,0 

♦define WINDOW_SIZE 9 . 

♦define VIEWJRATIO (EYE_TO_SCREEN / WINDOW^SIZE) 

/* Stereo paraxns in VRC units */ 

♦define VRCJ»INDOW_SIZE 4.0 

♦define INCHES_TO_VRC (VRCJ*INDOW_SIZE / WIND0W_SIZE) 

♦define VRC PRP (EYE TO SCREEN * INCHES JTO_VRC) 



( 



♦define HALF OCCULAR 



(1.25 * INCHES TO VRC) 



( 
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Stereo Setup Procedure 

L Open a Connection to the Stereo Screen 

The application must first open a connection to the stereo screen. This is done 
by opening screen host:0.1 . The display pointer that is returned with the con- 
nection is then used when creating the X window that will hold the PHIGS 
workstation graphics. 

2. Open a Window on the Stereo Screen 

Again, do this by creating the X window with the stexeo screen's display 
pointer. 

3. Open a PHIGS Workstation for the Stereo Window 
For example, 

conn . drawable_ id - 3tereo_ win; 
popenw3<stereo_wks, (Pconnid *) (ficonn) , 
phig3_wa_type_x_ drawable) ; 

4. Set Up The Left-eye and Right-eye Views 

Set up the PRP (one for each eye) in conjunction with the viewing plane. 
Again, the position of the viewing plane corresponds with the monitor screen. 
The z- value of the PRP is the z-coordinate of the PRP in VRC space. This dis- 
tance should directly correspond with the distance of the user's eyes from the 
screen. The application should translate physical distances into distances in 
VRC units. Create the left-eye and right-eye viewing matrices and put one 
each in the view tables of the left-eye and right-eye workstations: 

/* left eye view */ 

mapping. prp.x - -1.0 * half _occular_di3t ; 

pevalviewraappingraat rix3 ( fimapping, Serr , 

viewer ep*mapping_matrix) ; 
paetviewrep3(3tereo_wk3 f left_view_index, & view_r ep ) ; 

/* right eye view */ 

mapping. prp.x ■ half _ occular_dist ; 

pevalviewmappingmatrix3 (^mapping, Serr, 

vie w_r ep . mapp ing jma t r ix ) ; 
paetviewrep3(stereo — wJca r right_view_ index, fiview_rep) ; 
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S« Put the GSE Stereo View Index Element Into the Structure V. 

Put the GSE stereo view index element into the 3D structure that points to the 
stereo viewing matrices created in step 4. 

popenstruet (structure) ; 
paetviewind(3tereo_ view^indeac) ; 

(Je Post the Structure to the Stereo Workstation 

Post the structure to the stereo workstation to view theSD object. 

ppost at ruct ( at ereo_wfcs , structure ,0.0); 
7, Enable Screen Toggling 

By default, die X server is not able to toggle between die regular screen and 
the stereo screen when the cursor is moved off the left- or right-side of the 
screen. To enable screen toggling, the application should make the following 
Xcall: 

XScreenWarpByCurspr (display, True) ; 

To disable screen toggling, the application should make the following X call: 

XScreenWarpByCursor (display, False) ; 



( 
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2. Known Bugs in the System 

ES/PSX Bugs 

ES/PSX Bugs Fixed but Not Reported in Previous Releases 

Rendering Spheres in CPK 

If you run dynamic CPK with low precision spheres, rotate the spheres with 
their poles parallel to the monitor screen, and move the spheres a short dis- 
tance, horizontal lines may flash out of the spheres. This problem has been 
fixed in the 1.3.1 Release. 

CPK Specular Highlights 

When displaying a CPK model in ES/PSX with a high precision value and the 
terminal emulator turned on, movement of the cursor across the screen may 
cause the specular highlights to blink. This problem has been fixed in the 
1.3.1 Release. 

CPK Spheres Clipped 

In ES/PSX, spheres and lines with z positions that cause them to reside in the 
back half of the CPK window are clipped and not seen. This problem has been 
fixed in the 1.3.1 Release. 

CPK Renderings Inverted in z 

In ES/PSX, some CPK renderings may be inverted in z. This problem has been 
fixed in the 1.3.1 Release. 

Turning Off the Display When Rendering 

When a rendering is done on the PS 390, the display is turned off by sending 
the equivalent of a fix(l) to TURNONDISPLAY, which turns the wireframe 
display off. This prevents stenciling over the static image on the PS 390. This 
feature has been implemented in ES/PSX with the 1.3. 1 Release. 

READASCH May Crash ES/PSX 

If you send a filename to <1 >readascil, ES/PSX may crash. This problem has 
been fixed in the 1.3.1 Release. 

DELETE STRUCTURE May Crash ES/PSX 

Using the DELETE STRUCTURE command may crash ES/PSX. The prob- 
lem occurs when a Set node in the structure that is being deleted is empty. 
This problem has been fixed in the 1.3.1 Release. 
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Set Nodes in a Structure 



If you have a Set node under another Set node, which was created in 
OPTIMIZE STRUCTURE mode and which does not require the state to be 
saved, the X server will hang. This problem has been fixed in the 1.3.1 Re- 
lease. 

ES/PEX Bugs 

The following ES/PEX bug has been identified in the 1.3 and 1.3.1 Releases. 

4.24 EXECUTE STRUCTURE 

When structures are terminated with EXECUTE STRUCTURE elements, 
problems occur when that teraiinating EXECUTE STRUCTURE element is 
deleted. To avoid this possibility, you should terminate with something other 
than an EXECUTE STRUCTURE 

ES/PEX Bugs Fixed in the 1 J.1 Release 

The following ES/PEX bug that was reported in the 1.0 Release Notes has 
been fixed in the 1.3.1 Release. 

4.4 ES/PEX Polygon Rendering with ES/PSX Running 

The following ES/PEX bug that was reported in the 13 Release Notes has 
been fixed in the 1.3.1 Release. 

4.15 Linetypes and Edgetypes 
ES/PEX Bugs Fixed but Not Reported in Previous Releases 

Back/Front Area Properties 

With FACE DISTINGUISH MODE on and different properties set for the back 
and front area properties, the image will have the same properties for both. 
This problem has been fixed in the 1.3. 1 Release. 

Facet Normals 

If facet normals are not specified, they are calculated from the last vertices in- 
stead of from the first vertices. This problem has been fixed in the 1.3.1 Re- 
lease. 
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3- Documentation Corrections 

ESV Workstation User's Manual 

"8. Porting Guide" 

1) On page 8-62, the second line of the FORTRAN example in the "Array 
Handling' 9 section should read, 

t(l,l), t(2,l>, t<l,2), t<2,2), t(l,3), t<2,3> 

2) On page 8-64, the description under the "Debugging Procedures" bulleted 
item should read, 

u You compile programs for debugging using the -g option of the driver 
command that compiles your program and then you execute the resulting 
object with the dbx debugger." 
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4. Installation Instructions 

In the following procedure, system output is shown in typewriter normal 
font, and user responses are shown in typwritar bold font. All user re- 
sponses should be typed as shown and entered with a carriage return. 

Caution: It is recommended that you be the only user 
logged onto the machine while loading this 
software. 

ES/Dnet customers should note that DECnet 
should be stopped before the 1.3.1 Release 
tape is installed. Eitot messages will occur if 
this is not done. ES/Dnet can be stopped by 
the following command: 
/•tc/iait.d/deknat atop 
ES/Dnet can be restarted by the following 
command: 

/«tc/ini.t.d/dAkMt start 
To install this tape, insert the ES/Patch Tape 1.3.1 into the tape drive, 

login as root, and proceed as follows: 

cd / 

/usr /pkg/bia/ inst 

Software package installation 

Install package relative to where [/]? <CR> 
Please mount the (first, if multiple tapes) 
distribution tape f then press return... <CR> 
Rewinding the tape . . . 
Verifying tape id. . . ok 

Extracting packaging information tree... patchl.3.1 

Installation Information: 

Packages will be read in from the local Q24 tape drive. 
Machine type: ml 20 

Is the information above correct? (y n) [y]? <CR> 
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■o^,.. , ■■■ —■— checking subpackages — -■ —— —» v. 
The following subpackages may be installed: 
patch— 1.3.1 Patch Release 
' ' ■ selecting subpackages ■-■■-■■■■> >*■ 

You may select all of the above subpackages by answering "y" to *© 
following question. If you answer "n" then you will be asked to select the 
optional subpackages you would like to have installed. 

Install ALL subpackages (y n) [n]? y 

■■»" " " - ■"■■ '» setting system clock/ calendar — ^— — 

The current value of the clock is: Tue Dec 4 09:36:32 

MST 1990 
Is the clock correct (y n) [y]? y 



verifying single-user mode 



This system is not presently in a single-user run level. 
Installation of a package can fail if performed at this 
run level. We recommend that the system be brought to a 
single user run level {using "init S") prior to 
performing the installation. 

Are you absolutely sure you wish to continue (y n) [n] ? y 

■ ■ ■ ■■■■■■■■■■■ preserving local files -■■-■■*-— 

No preserve list or findmods list for patch- 
preserve not executed. 



( 



verifying disk space 



Do you want to check for space (please do so unless you 
really understand the consequences) (y n) [y]? y 

The system will now be checked to verify that there 
is enough disk space with the current configuration 
to successfully install the package (and any selected 
optional subpackages) . For large packages (especially 
operating system packages) , this can be time 
consuming ... 
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There ia enough apace. 

■■■ ■■ ■ ■■ ■ ■■■ stripping old links ■— «— — 

Stripping links for subpackage patch... 

,»«* extracting files from subpackage archives 

rewinding the tape . . . 
Verifying tape id. . . ok 
Forward spacing the tape... 

Loading subpackage: patch... 
Forward spacing the tape... 
rewinding the tape . . . 



running comply 



running first comply pass . . . 

running second comply pass . . . 

There were no comply messages from the second pass . 

„— doing uncompress Tue Dec 4 09:41:32 MST 1990 — 

:■ ■ ■■—■ — cleaning up old versions «-——»■«* 

An attempt will now be made to clean up any files left 
over from previous versions of the software which has 
just been installed. 

Searching for old versions to remove. . . 

■■■■■■■ — restoring preserved user files —- »— i 



No preserve list or findmods list for patch- no files 
restored. 



cleaning up 



Remove install tools (y n) [n] ? y 

■ installation complete 
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A. PHIGS Stereo Example Program 

This program can be found in /usr/peopie/fstest/demo/stereo_demo.c. 

* stereo_ demo . c 

* 

* A Canonical Stereo Program to prototype stereo on ESV, 

* release 1.3.1. 

A******************************************************************/ 

♦include <X11/Xlib.h> 
♦include <Xll/Xatom.h> 
♦include <phigs.h> 
♦include <stdio.h> 
♦include <ermo.h> 
♦include <string.h> 
♦include <XVideoMode . h> 
♦include <XInput.h> 

extern int errno; 

char *ProgramName; 



1 

2 

3 

4 

5 

6 

7 

/* Stereo params in physical inches */. 
♦define EYEJTO_SCREEN 36.0 
♦define WINDOW_SIZE 9.0 

♦define VIEW_RATIO (EYE_TO_SCREEN / WINDOW_SIZE) 
/* Stereo params in VRC units */ 
♦define VRC_WINDOW_SIZE 4.0 

♦define INCHESJTO_VRC <VRC_WINDOW_SIZE / WINDOW_SIZE) 
♦define VRC_PRP (EYE_TO_SCREEN * INCHES JTO_VRC) 
♦define HALFJ3CCULAR (1.25 * INCHES JTO_VRC) 



♦define 


BLACK 


♦define 


WHITE 


♦define 


RED 


♦define 


GREEN 


♦define 


BLUE 


♦define 


YELLOW 


♦define 


CYAN 


♦define 


MAGENTA 
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/* Dial handling */ 








♦define XROTJ)IAL 









#define YROTJDIAL 


I 






♦define ZROTJDIAL 


2 






♦define SCALE JDIAL 


3 






♦define XTRANJDXAL 


4 






♦define YTRANJDIAL 


5 






♦define ZTRANJDIAL 


6 






♦define DIALSCALE 


.. 330. 


,0 




♦define MAXDXALS 


8 






♦define CHAR$J>ERJDIAL 8 






♦define SPACEKEYSYM 


32 






♦define TRUE 


1 






♦define FALSE 









♦define FRONT_BOTTOM_ 


_LEFT 


{-0.5, -0. 


.5, 0.5} 


♦define FRONT_BOTTOM_ 


RIGHT 


{ 0.5, -0, 


.5, 0,5} 


♦define FRONT_TOP_LEFT 


{-0.5, 0, 


.5, 0.5} 


♦define FRONT_TOP_RIGHT 


{0.5, 0. 


.5, 0.5} 


♦define BACKJ30TT0M_LEFT 


{-0.5, -0, 


.5, -0.5} 


♦define BACK_BOTTOMJlXGHT 


{ 0.5, -0, 


.5, -0.5} 


♦define BACKJTOP_LEFT 


{-0.5, 


.5, -0.5} 


♦define BACK_TOPJ*IGHT 


{ 0.5, 


.5, -0.5} 


♦define FRONT { 


FRONTJ 


IOPJRXGHT, 


FRONT JTOP_LEFT, \ 




FR0NT_30TT0M_LEFT ( 


, FRONT J3OTT0M_RIGHT } 


♦define BACK { 


BACKJTOP^LEFT, 


BACK_TOP_RIGHT, \ 




BACK. 


_BOTTOMJlIGHT ( 


, BACK_BOTTOM_LEFT} 


♦define LEFT { 


FRONT_ 


TOP_LEFT, 


BACKJTOP_LEFT, \ 




BACK 


_BOTTOM_LEFT, 


FRONT_BOTTOMJLEFT } 


♦define RIGHT { 


FRONT_ 


TOPJIIGHT, 


FRONT_BOTTOM_RIGHT, \ 




BACK 


_BOTTOM_RIGHT 


, BACK_TOP_RIGHT} 


♦define TOP { 


FRONT_ 


TOPJIIGHT, 


BACK_TOP_RIGHT, \ 




BACK 


_TOP_LEFT, 


FRONT_TOP_LEFT } 


♦define BOTTOM { 


FRONT_ 


BQTTOMJIIGHT, 


FRONT JBOTTOM_LEFT, \ 




BACK 


BOTTOM LEFT, 


BACK BOTTOM RIGHT} 



c 



c 



/* Flags for current video atate */ 

♦define MONO 

♦define STEREO 1 

int mode — flag - MONO; 



( 
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Static Ppoint3cube[6][4] - { FRONT, BACK, LEFT, RIGHT, TOP, BOTTOM 

Pint mono_wJcs- 1; 

Pint stereo_wJcs- 2; 

Pint structure- 1; 

Pint mono_view — index - 1/ 

Pint left_view_index - 1; 

Pint right_view_index - 2; 

Pfloat priority- 1.0; 

Pint rotate_elem, translate_elem; 

int winx p winy, winw, winh; 

int mono_winx, mono_winy, mono_winw, mono_winh; 

Window mono_win r mono_rootwin, stereo_win, stereo^rootwin; 

Display *dpy, *sdpy; 

GCqntext gc; 

GC gcjblack; 

int text_x, text_y; 

float h_t o_w_aspect ; 

Pfloat half occularjiist - HALSVOCCULAR; 



/* Globals for 

XDevice 

XID 

XDevice 

XID 

XDevicelnfo 

int 

int 

int 

int 

int 

Pmatrix3 

Pxnatrix3 

Pviewmapping3 

Pviewrep3 

int 



device input stuff */ 
* tablet - NULL; 
tablet^ id - 0; 
♦dials - NULL; 
dials_id - 0; 
*de vices - NULL; 
ndevices - 0; 
DeviceMotion - -1; 
DevicePress - -1; 
DeviceRelease - -1; 
change CIO] ; 
xrotxnat, yrotmat, zrotmat, scalemat, concatl, 

concat2 , concat3 ; 
currmatrix, tranmatrix; 
mapping; 
view_ rep ; 
mono_fd f stereo_fd; 



Window XCreateWindow < ) ; 
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/****************** 



************************************************ 



C 



ident it y_mat r ix 

Make an identity matrix. 



******************** 



••••••a**************************************/ 



void identityjnatrix ( matrixit ) 

Pmat r ix3 mat r ixi t ; 
{ 

int i, j; 

for ( i - ; i < 4 ; i++) 
{ 

for ( j - ; j < 4 ; j ++ ) 
{ 

if (i — j ) 

matrixit [i] [j] - 1.0; 
else 

matrixit [i] [j] - 0.0; 
} 
} 
} /* End of identity^ matrix */ 



( 



/************************ 



****************************************** 



* usage 



************************* 

usage ( ) 

{ 

f print f (stderr, 

fprintf ( stderr , 

f print f (stderr, 

fprintf ( stderr , 

fprintf (stderr, 

fprintf ( stderr , 

f print f ( stderr , 

fprintf (stderr, 

fprintf (stderr, 

fprintf (stderr, 
exit (1) ; 



*****************************************/ 



"usage: %s [-options ...]\n\n", ProgramName) ; 
"where options include : \n" ) ; 
" -display host:dpy X server to uae\n") ; 
" -geometry geom geometry of window\n") ; 



-b 

-fg color 
-bg color 
-bd color 
-bw width 



w \n") ; 



use backing store\n") ; 
set foreground color\n") j 
set background color\n n ) , 
set border color \n") ; 
set border width\n") ; 



( 
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* 

* doPhigs Stuff 

* 

doPhigsStuf f (dpy, adpy) 
Display *dpy; 
Display *3dpy; 



{ 



static Ppoint xyzpoints[] - {{0.1, 0.1}, {0.9, 0.9}: 

Popenpexinf o xinf o ; 

Pconnid — x_drawableconn ; 

Ppoint text_pt; 

Pint part - 1; 

Ppoint3 rep; 

P int Is t names_t o__add ; 

int if err; 

float deg; 

Ppoint 3 tran, vrp; 

P vector 3 vpn, vup; 

P limit wJcs_ viewport, wks_ window; 

Pmatrix3 rotmat, comp_mat, tranl; 

Pugse0008rec stereo_views ; 



xinf o . display =* dpy; 

xinfo.rdb * NULL; 

xinf o. name - NULL; 

xinf o . classname - NULL; 

xinfo.argc_p * NULL; 

xinfo.argv - NULL; 

xinf o.f lags. nojmonitor * 1; 

xinf o.f lags. f or ce_ client_SS - 0; 

/* Open PHIGS mono */ 

popenpex( (P char*) NULL, PDEFAULTJMEM_SIZE, ixinfo) 
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/****** pex DEPENDENT way of declaring the workstation type ******/ ^ 

conn. display » dpy; 

conn . drawable_id * stereo_win; 

popenw3(stereo_wk3, (Pconnid *) Uconn) , phigs_ws_type_x_drawable) ; 

psethlh3rraode<stereo_wk3, PHIGS_HLHSR_MODE_ZBUFF) ; 

conn . drawafele_ id - mono_win; 

popenws (mon©_wks , (Pconnid * ) ( Sconn ) , phigs_ws_type_x_dr a wable ) ; 

psethlhsrinodetmono^wks, PHIGS_HLHSRJ*ODE_ZBUFF) ; 

wks^viewport.xmin -0.0; 
wks^viewport.sxnax - winw; 
wks^viewport.ymin - 0.0? 
wks_yiewp©£t . yxnax - winh; 
psetwsviewport (3tereo_wks, &wks_viewport) ; 

wka — viewport . xxnax * raono__winw; 
wks^viewport . ymax « mono_winh; 
psetwsviewport (ffiono^wks, 6wks_ viewport) ; 



wks_window „ xmin - 0.0; 

wks_window . xtnax - 1.0; 

wks_window . ymin « 0.0; 

wks^window . ymax - 1.0; 

psetws window ( 3tereo_wks , &wks_window) ; 

psetwswindow (mono^wks , &wks_window) ; 

/* Set Background color; entry of table. */ 

rep.x - 0.50; 

rep.y - 0.50; 

rep. z - 0.50; 

p3etcolourrep<stereo_wk3r 0, Srep ); 

pset colour rep (mono^wks, 0, &rep ); 

rep .x - 1.0; 
rep . y *» . ; 
rep. z -0.0; 

psetcolourrep(3tereo_wk3 r RED, &rep ); 
pset colour rep <mono_wk3 * RED, &rep ); 



C 



( 
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rep.x * 0.0; 

rep.y * 1.0; 

rep .2 * 0.0; 

psetcolourrep<3tereo_wlc3, GREEN, Srep ); 

psetcolourrep <mono_wic3 , GREEN r Srep ); 

rep.x - 0.0; 
rep.y - 0.0; 
rep.z - 1.0; 

paetcolourrep(3tereo_wk3, BLUE, 4rep : 
paetcolourrep <mono_wka , BLUE, &rep ); 

rep.x - 1.0; 

rep.y * 1.0; 

rep. 2 - 0.0; 

p3etcolourrep(3tereo_wk3, YELLOW, irep 

psetcolourrep(mono_wk3, YELLOW, &rep ); 

rep.x - 0.0; 
rep.y « 1.0; 
rep.z ■ 1.0; 

p3etcolourrep(3tereo_wJcs, CYAN, &rep ) 
p3etcolourrep(mono_wk3, CYAN, &rep ); 

rep.x - 1.0; 

rep . y ■ 0.0; 

rep.z « 1.0; 

psetcolourrep<3tereo_wks, MAGENTA, &rap ); 

paet colour rep <mono_wk3, MAGENTA, &rep ); 

/* Viewing Stuff Common to Stereo and Mono */ 
/* Set up the left and right eye views */ 



vrp.x - 0.0 
vpn .x » 0.0 
vup .x - 0.0 



vrp . y - 0.0; vrp . z - 0.0; 

vpn.y * 0.0; vpn.z - 1.0; 

vup . y - 1.0; vup . z - 0.0; 
pevalvieworientationmatrix3 (&vrp, 4vpn, &vup, &err, 

view_rep. orient at ionjmatrix) , 
view_rep.clip_limit.xmin - 0.0; 
view_rep . clip_ limit. xmax - 1.0; 
view_rep . clip_limit . ymin - 0.0; 
view_rep . clip_ limit. ymax -1.0; 
view_rep.clip_limit.2min - 0.0; 
view_rep.clip_limit.zmax - 1.0; 
view_rep . clip_xy - PCLIP; 
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( 



view_rep.clip_back - PNOCLIP; 
view_ rep . clip_f ront - PNOCLIP; 

mapping. window. xmin - -1.0 * VRCJWINDOW_SIZE/2.0; 

mapping, window, xniax - VHC_WINDOW_SIZE/2.0; 

mapping. window. ymin « -1.0 * VRCJ¥INDOW_SIZE/2.0; 

mapping. window. ymax - VRC^WINDOW_SIZE/2.0; 

mapping.viewport.zmin - 0.0; 

mapping. viewport. zmax * 1.0; 

mapping. pro j - PPERSPECTIVE; 

mapping. prp»y - 0.0; 

mapping.prp.2 « VRC_PRP; 

mapping . viewjalane - -0.0; 

mapping. back^plane - -100.0; 

mapping. front_plane - mapping . prp . z - 1.0; 

/* Viewing Stuff for Mono eye view */ 
mapping. viewport. xmin - 0.0; 
mapping. viewport. xmax - 1.0; 
mapping . viewport . ymin - . ; 
mapping . viewport . ymax - 1.0; 
mapping. prp. x * 0.0; 
pevalviewmappingmatrix3 (fimapping, &err, 

vie w_rep.mapping_ matrix) ; 
psetviewrep3 (mono_wks , mono_view_index, &view_rep) ; 

/* Viewing Stuff for Stereo views */ 
mapping . viewport . xmin - 0.0; 
mapping. viewport. xmax - 1.0; 
mapping . viewport . ymin -0.0; 
mapping . viewport . ymax -1.0; 

/* left eye view */ 

mapping. prp. x - -1.0 * half _occular_di3t ; 

pevalviewmappingmat rix3 < fimapping, &err , 

view_rep.mapping_matrix) ; 
pset viewrep3 ( at ereo_wks , lef t_view_index r & view_rep ) ; 

/* right eye view */ 

mapping. prp. x - half_occular_di3t; 

pevalviewmappingmat rix3 < &mapping, fierr , 

view^ rep.mapping_matrix) ; 
psetviewrep3<atereo_wks f right_view_index r &view_rep) 



C 



( 
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/* Build the geometry structure */ 

/* */ 

popenatruct ( structure) ; 

/* paetviewind <mono_view_ index) ; */ 

stereo_viewa.mono ■ left_ view_ index; 

atereo_viewa.left - left_view_index; 

at ereo_views . right - right_view_index; 

pgae (PUGSE_STEREO_VIEW_INDICES r Sat ereo_viewa ) 

paethlharid(PHIGS_HLHSR_ID_ON) ; 

/* Tranalate node for diala */ 

tran.x - 0. 0; 

tran.y - 0. 0; 

tran.z - 0.0; 

tranalate_ elem * 3; 

ptranalate3 ( &tran, fierr, tranl ) ; 

paetlocaltran3 ( tranl, PPRECONCATENATE ); 

/* set initial degree of rotation to */ 

deg - 0.0; 

rotate^ elem - 4; 

protatez( deg, Serr, comp — mat ); 

paetlocaltran3 ( comp^mat, PPRECONCATENATE ); 

/* Tranalate node to offset object a little */ 

tran.x - 0.50; 

tran.y - 0.0; 

tran.z - 0.0; 

ptranalate3 ( itran, &err, tranl ) ; 

paetlocaltran3 ( tranl, PPRECONCATENATE ); 

paetintatyle ( PSOLID) ; 

paetf acecullmode ( PCULL_NONE ) ; 
paetf acediatgmode ( PDISTGJNO ) ; 

paetintcolourind< BLUE);/* blue */ 
pfillarea3( 4, cubetOl); 

paetintcolourind( GREEN);/* green */ 
pfillarea3( 4, cubed]); 
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psetintcolourind( RED); /* red */ 

pfillarea3( 4, cube [2]) ; 

psetintcolourind( YELLOW); /* yellow */ 
pfillarea3( 4, cube [3]) ; 

psetintcolourindC CYAN); /* cyan */ 

pf illarea3 ( 4 , cube [ 4 ] ) ; 

paetintcolourindC MAGENTA); /* magenta */ 

pf illarea3 ( 4 , cube [ 5 ] ) ; 

pclosestruct ( ) ; 

/* set edit mode to replace */ 

pseteditmode (PEDIT_REPLACE) ; 

/* set display updates to wait */ 

pset displayupdat est ( st ereo^wks , PWAIT , PNIVE ) , 

pset displayupdat est (ra©no_wks, PWAIT , PNIVE); 

/* post the structure */ 

ppost struct ( stereo_wks , structure, 0.0) ; 

ppoststruct <mono — wks r structure, 0.0) ; 

/* Do the first display */ 

pupdatews ( mono_wks , PPERFOPM ) ; 

/* Go look for dial events, etc. */ 
MyMainLoop () ; 

pclosews ( stereo_wks ) ; 
pclosews(mono_wks) ; 
pclosephigs ( ) ; 

} /* End of doPhigsStuff */ 



C 



( 



( 



A -10 1.3.1 Release Notes 



PHIGS Stereo Example Program 



* MyMainLoop 

* 

* Custom loop so we can catch events 

* associated with the extensions to X Input and apply them to 

* PHIGS structures. 

* 

int MyMainLoop () 



int i, dials^values [ 10 ] , error , event s_ waiting, nf ds ; 

unsigned long readfds, writefds, except fds; 

unsigned long monofdmask, stereo fdmasJc; 

static int rotate_dirty, tranjiirty; 

Pvector3 tranval, scaleval; 

XEvent event , peek — event; 

XAny Event *any_event; » 

XButtonEvent butt on_e vent ; 

XDeviceMotionEvent *dm; 

Display *current_dpy; 

/* Set up file descriptor masks */ 
monofdmask • 1 « mono_ fd; 
stereofdmask * 1 « 3tereo_fd; 

/* Initialize the current screen pointer. */ 
current_dpy - dpy; 

/* Initialize the rotation-scale accumulation matrix */. 
identityjmatrix(currmatrix) ; 

/* Initialize the translation accumulation vector */ 
tranval.x * 0.0; tranval.y * 0.0; tranval.z « 0.0; 
/* Initialize the scale accumulation vector */ 
scaleval. x - 1.0; scaleval. y - 1.0; scaleval. z - 1.0; 

/* Do forever */ 

for (;;) 

{ 

/* Use "select" to sleep on input from the two screens */ 

readfds * monofdmask I stereofdmask; 
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writefds » 0; exceptfds - 0; \^ 

nfds - select (32, &readfds, fiwritefds, &exceptfds r NULL); 
if (nfds — 0) 
continue; 

/* First get the event */ 

/* Check the Mono coram line */ 

if ( (readfds & monofdmask) !- 0) 

{ 

if ( (event s_waiting - XPending(dpy) ) !- 0) 

f 
current^ dpy - dpy; 
XNext Event (cur rent_dpy, fievent) ; 
any ra event - (XAnyEvent *) & event; 
mode_flag - MONO; 
} 
} 

/* Check the Stereo coram line */ 
else if ( (readfds 6 stereofdraask) !■» 0) 
{ 

if ( (events_waiting - XPending(sdpy) ) !- 0) 

{ 

current^ dpy - sdpy; 
XNextEvent ( cur rentjdpy , ievent ) ; 
anyjavent - (XAnyEvent *) fievent; 
mode_flag - STEREO; 
} 
} 

else 
{ 

continue; 
} 

if ( (event. type —• MapNotify) 1 I 
(event. type — Expose) II 
(event. type -*» ConfigureNotify) ) 



{ 



( 



if (any_event->window — mono_win) 

{ 

predrawallstruct (mono jwks , PALWAYS) ; 

XS ync ( cur rent _dpy , ) ; 
} 
else if (any_event->window -■» stereo^win) 
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predrawallstruct (stereo_wlcs, PALWAYS) ; 

XSync (current_dpy, 0) ; 
} 
} 
else if (event. type — LeaveNotify) 

{ 

if (any_event->window — 3tereo_rootwin) 

{ 

current_dpy - dpy; 

> 

else if (any_event->window — mono_ rootwin) 

{ 

current_dpy - sdpy; 

} 

} 

else if (event. type — DeviceMotion) 

{ 
do 

{ 

peek_event . type - 0; 

/* If this is a tablet event */ 

dm - (XDeviceMotionEvent *) Sevent; 

if (dm->deviceid — tablet^ id) 

{ 

printf ("Tablet Motion\n rt ) ; 

} 

/* If this is a dial event */ 
else if (dm->deviceid — dials_id) 

{ 

/* printf ("Dial event. \n") ; */ 

/* Now process the data for all dials. */ 

for (i • 0; i < dm->axes_ count ; i++) 

{ 

/* Copy the new dial value */ 
if (dm->axis_data[i] !- 0) 
{ 

dials_values[i + dm->first_axis ] - 

dm->axis_data [i] ; 
/* Set the dirty flag */ 
change [ i+dm->f irst_axis ] - 1; 
} 
} 
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if (XPending(current_dpy) > 0) 

{ 

XPeekEvent ( current_dpy, &peek_event ) ; 

if ( peek_event . type — DeviceMotion ) 
XNextEvent ( cur rent_dpy , ievent ) ; 
} 

} /* End of if this is a dial event */ 

} while ( peek_event.type — DeviceMotion ). ; 

/* Now Edit the PHIGS structure */ 

/* Do the rotation matrices */ 
rotate_dirty - FALSE; 
if (change [XROTJDIAL] ) 

{ 

protatex ( (float ) dials^values [XROT_DIAL] /DIALSCALE, 
terror, xrotmat ) ; 

rotate_dirty - TRUE; 
} 
else 

identity_matrix ( xrotmat ) ; 



if (change [YROTJDIAL] ) 
{ 

protatey ( (float) dials_vaiues [YROTJDIAL] /DIALSCALE, 
fierror, yrotmat ) ; 

rotate_dirty • TRUE; 
} 
else 

identity_matrix ( yrotmat ) ; 

if (change [ZROTJDIAL]) 
{ 

protatez ( (float) dials_values [ZROTJDIAL] /DIALSCALE, 
terror , zrotmat ) ; 

rotate_dirty ■ TRUE; 

) 

else 

identity_matrix ( zrotmat ) ; 

if (change [SCALEJDIAL] ) 
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{ 

scaleval.x • 1.0 + 

(float) dials_values [SCALEJDIAL] / (10 . 0*DIALSCALE) ; 

scaleval.y - scaleval.x; 

scaleval.z - scaleval.x; 

pscale3 ( iscaleval, &error f scalemat ) ; 

rotate_dirty - TRUE; 
} 
else 

identityjmatrix ( scalemat ) ; 

if (rotate_dirty — TRUE) 

{ 

pcomposematrix3 ( currmatrix, xrotmat, Serror, concatl ) 
pcomposematrix3 ( concatl, yrotmat, terror, concat2 ); 
pcomposematrix3 ( concat2, zrotmat, Serror, concat3 )/ 
pcomposematrix3 (concat3 r scalemat, Serror, currmatrix ) 
popenstruct (structure) ; 
paateditmode ( PEP ITJIEP LACS) ; 
psetelemptr(rotate_elem) ; 

psetlocaltran3 ( currmatrix, PPRECONCATENATE ) ; 
pclosestruct () ; 



/* Change Translation Matrix */ 

tranjdirty" - FALSE; 

if (change C XTRANJD I AL] ) 

{ 

tranval.x +- ( float ) dials_values [XTRAN_DIAL] /DIALSCALE ; 

tran_dirty - TRUE; 

} 

if (change [YTRANJDIAL] ) 

{ 

tranval.y +- (float) dials_values [YTRANJDIAL] /DIALSCALE; 

tranjdirty - TRUE; 
} 

if (change [ZTRANJDIAL] ) 

{ 

tranval. z +• (float) dials_values [ZTRANJDIAL] /DIALSCALE; 

tran_dirty - TRUE; 

} 
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if <tran_dirty — TRUE) ^ 

{ 

ptranalate3 Utranval, fierror, tranmatriac) ; 

popenstruct (structure) ; 

pseteditmode (PEDITJtEPLACE) ; 

pseteleniptr<translate_elem) ; 

psetlocaltran3 ( tranmatrix, PPRECONCATENATE ) ; 

pclosestruct ( ) ; 
} 



if (mode_ flag — STEREO) 

{ 

pupdatews (stereo_wks, PPERFORM) ; 
} 

else 
{ 

pupdatews (mono^wks , PPERFORM); 
) 



for «i»0,- i<8; i++) 
change [i] - 0; 

} /* End of if event is DeviceMotion */ 

} /* End of do forever */ 

/* End of MyMainLoop */ 



( 



( 
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/******************** 



*********************************************** 



****** 



************************************************************/ 



ma±n(argc, argv) 

int argc; 
char *argv[]; 



{ 



int 



amount, i, j ; 



char 


*geom « NULL; 


register int 


xdir, ydir; 


register int 


xoff, yoff; 


register int 


centerX, centerY; 


XSizeHints 


hints ; 


XGCValues 


xgcv; 


XSetWindowAttributes xswa; 


XWindowAttributes winattr; 


Window 


root ; 


Colormap 


map; 


int 


x f y, w, h; 


int 


mono_button_x, mono_button_y, 




mono button^ w, mono_button — h; 


int 


mono_button_bw, mono_button_bc, mono_ buttonjockgrnd; 


Font 


font ; 


char 


* font name; 


XFontStruct 


*font_info; 


XGCValues 


gcvals; 


unsigned 


valmask; 


unsigned int 


d; 


unsigned int 


bw - 1; 


char 


♦display - NULL; 


char 


* a t e r eoD isp 1 ay S t r ing ; 


Status 


status; 


char 


*strptr; 


char 


*fg - NULL; 


char 


*bg - NULL; 


char 


*bd - NULL; 


int 


fg_pix, bg_pix, bd_pix; 


XColor 


fgjttef, fg^exact, bg_de£, bg_exact, bdjief, bd_exact 


int 


bs - NotUseful; 


Visual 


visual; 
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ProgramName - argv[0]; 

for (i-1; i < argc; L±±) 
{ 

char *arg - argv[i]; 

if (argCO] — '-') { 
switch (argCl]) { 

case 'd' : /* -display host:dpy */ 
if C++i >- argc) usage () ; 
display «■ argvfi]; 
continued- 
case r g' : /* -geometry host:dpy */ 
if (++i >- argc) usage ; 
geom - argv[i] ; 
continue; 
case 'b ff : /* -b or -bg or -bd */ 
if <!strcmp<argv[i], .--bg") ) { 
if (<H>i >cs argc) usage (); 
bg - argv[i] ; 
} else if (!strcmp<argv(i], w -bd") ) { 
if (++i >* argc) usage () ; 
bd « argv[i] ; 
} else if ( !strcmp(argv[i] , w -bw w ) ) { 
if (++i >- argc) usage () ; 
bw ■ atoi(argv[i] ) ; 
} else 

bs • Always; 
continued- 
case r £' i /* assume -fg */ 
if (++i >« argc) usage ; 
fg • argvfi] ; 
continue; 
default : 

usage ( ) ; 
} 
} else if (argv [i] [0] — '-') /* obsolete */ 

geom « argvfi] ; 
else 

usage () ; 



( 



( 



( 
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if ( ! (dpy - XOpenDisplay (display) ) ) 

{ 

perror ( "Cannot open display \ n " ) ; 

exit(-l) ; 

} 

mono_fd - XConnectionNumber (dpy) ; 

/* Open the stereo screen for stereo windows. */ 
StereoDisplayString - XD isplaySt ring (dpy) ; 
strptr « rindex (stereoDisplayString, ':'); 
sprintf( (strptr + 1) , "0.1"); 
if (!(sdpy - XOpenDisplay( stereoDisplayString) )) 

{ 

perror ("Cannot open display for Stereo screen\n") ; 

exit(-l) ; 
} 
stereo_fd - XConnectionNumber (sdpy) ; 

if (fg>~ { 

status - XAllocNamedColor(dpy, map, fg, &fg_def, &fg_exact) ; 

fg_pix - status ? fg_def .pixel : 

WhitePixel (dpy, Def aultScreen (dpy) ) ; 
} else 

fg_pix - WhitePixel (dpy f Def aultScreen (dpy) ) ; 

if (bg) { 

status - XAllocNamedColor (dpy, map, bg, sbg_def, &bg_exact) ; 

bg_pix - status ? bg_def .pixel : 

BlaclcPixel (dpy, Def aultScreen (dpy) ) ; 
} else 

bg_pix - BlackPixel (dpy, Def aultScreen (dpy) ) ; 

if (bd) { 

status - XAllocNamedColor(dpy, map, bd, fibdjief, &bd_exact) ; 

bd_pix - status ? bdjdef .pixel : 

WhitePixel (dpy, Def aultScreen (dpy) ) ; 
} else 

bd_pix - WhitePixel (dpy, Def aultScreen (dpy) ) ; 
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if (geom) 
{ 

(void) XParseGeometry(geom, &mono_winx, £mono_winy, 

&mono_winw r &mono_winh) ; 

} 



xswa.backing_store - ba; 

xawa.event_maak - ExpoaureMaak I StructureNotifyMaak; 

xawa.background_pixel - bg_pix; 

xawa. border jpixel ■ bd^pix; 

viaual . viaualid - CopyFromParent ; 

/* Select leave events on the mono root window */ 
mono_rootwin - RootWindow (dpy, Def aultScreen (dpy) ) ; 
XSelectlnput (dpy, mono_rootwin r LeaveWindowMaak) ; 

/* Create Mono window */ 

if (meno^winh «*■* 0) 

xnono M winh - 500; 

if (mono_winw — 0) 

mono_ winw * 500; 

mono — win - XCreateWindow(dpy, 

RootWindow (dpy, Def aultScreen (dpy) ) , 

mono_winx, mono_winy, mono_winw, mono_winh, bw, 

DefaultDepth(dpy, Def aultScreen (dpy) ) , InputOutput, 

Svisual, 

CWfiventMaak I CWBackingStore I CWBorderPixel I CWBackPixel, 

fixawa) ; 

XChangeProperty(dpy, mono_win, XA_WMJJAME, XA_STRING, 8, 

PropModeReplace, "Stereo Demo", sizeof ("Stereo Demo") ); 

3Q4apWindo w ( dpy , mono_win ) ; 

/* Open input devicea, select on dial events */ 

SenaitizeWindow(dpy, mono_win) ; 

XSync(dpy, 0) ; 



/♦Select leave events on the stereo root window */ 
stereo_rootwin - RootWindow < sdpy, Def ault Screen (sdpy) ) ; 
XSelectlnput (sdpy, stereo^rootwin, LeaveWindowMask) ; 



C 



C. 



A - 20 1 .3.1 Release Notes 



PHIGS Stereo Example Program 



/* Open the stereo window on the Stereo Screen */ 

winx - 0; 

winy » 0; 

winh - (XDisplayHeight (sdpy, 1)) - 100; 

winw • winh; 

stereo_win - XCreateWindow<sdpy, 

RootWindow (sdpy, Def aultScreen (sdpy) ) , 

winx, winy, winw, winh, bw, 

Def aultDepth ( adpy , Def aultScreen < sdpy ) ) , InputOutput , 

& visual, 

CWEventMask I CWBackingStore I CWBorderPixel I CWBackPixel, 

Sxswa) ; 
XSync(sdpy, 0) ; 
XChangeProperty<sdpy, stereo_win, XA_WMJIAME, XA_STRING, 8, 

PropModeReplace, "Stereo Demo", 11) ; 
hints. flags - USPosition I USSize ; 
hint s.x - winx; 
hints.y - winy; 
hint a. width - winw; 
hints . height* winh; 

XSetNormalHints(sdpy, stereo_win, Shints) ; 
XSetTransientForHint (sdpy, RootWindow(sdpy, Def aultScreen (sdpy) ) , 

stereo_win ) ; 
XSync(sdpy, 0) ; 

/* Open input devices, select on dial events */ 
SensitizeWindow(sdpy, stereo_win) ; 
XMapWindow(sdpy, stereo_win) ; 
XFlush(sdpy, 0) ; 

doPhigaStuf f (dpy, sdpy) ; 

} /* End of main */ 
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/••••it************************************************************** 1 

* SensitizeWindow 

* 

* Routine to select input events for PHIGS graphics windows. 

* 

int SensitizeWindow (myjdpy, window) 
Display *tny_dpy; 
' Window window; 



{ 



int i, j; 

int eventCount « 0; 

XE vent Class eventClass [100]; 

XStringFeedbackControl strfc; 

KeySym ledstring CMAXDIALS] [ CHARS JPERJDXAL] , 

blankled[CHARSJ»ER_DIAL] ; 
static char text string CMAXDIALS] [CHJUR3JPERJDIAL] - 

{ " X ROT ", n Y ROT ", n Z ROT w , w SCALE ", 

n X TRAN n , n Y TRAN " , w 2 TRAN n f n " } ; 

/* Get a list of the available devices */ 
devices - XList InputDe vices (my_dpy, Sndevices) ; 

/* Open the input devices */ 

for (i - 0; i < ndevices; i++ f devices++) 

{ ' 

if { st rcrap ("TABLET", devices ->name) — 0) 

{ 

tablet^ id - devices -> id; 

tablet - XOpenDevice (myjipy, tablet_id) ; 

} 

if (strcmpCKNOBJBOX", devices ->narae) — 0) 

{ 

dials_ id - devices->id; 
dials - XOpenDevice <niy_dpy, dials_id) ; 
} 
} 

eventCount - 0; 



C 



C 
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if {! tablet) 

{ 

fprintf (stderr, "No TABLET \n n ) ; 

} 

else 

{ 

DeviceMotionNotif y (tablet , DeviceMotion, 

eventClass [eventCount] ) ; 

event Count ++ ; 

DeviceButtonPress (tablet , DevicePress, eventClass [eventCount] ) ; 
eventCount ++ ; 

DeviceButtonRelease (tablet, DeviceRelease, 

event Class [eventCount] ) ; 

eventCount ++ ; 
} 
if (! dials) 

{ 

fprintf (stderr, "No DIALS \n") ; 

} 
else 

{ 

DeviceMotionNotif y (dials, DeviceMotion, eventClass [eventCount] ) 

eventCount ++ ; 

} 



if (! dials && '.tablet) 
{ 

exit(O) ; 
} 

XFreeDeviceList (devices) ; 

XSelectExtensionEvent (my_dpy, window, eventClass, eventCount); 
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/* Set the dial labels */ I 

/* Load the keysym arrays */ V... 

for (i - 0? i < MAXDIALS; i++) 

for (j - 0; j < CHARS JPERJDIAL; j++) 
{ 

ledstringfi] [ j] - (KeySym) teactstringCi] C j] ;/* Dial labels */ 
blankled[j] - SPACEKEYSTO; /* Blank labels */ 

} 

strfc. class - StringFeedbackClass ; 

strfc. length - siseof (XStringFeedbackControl) ; 

strfcnumjceysyms - CHARS_PER_DIAL; 

for (i-0; i<MAXDIALS; i++) 

{ 

strfc. id - i; 

strfc. syms_to_display » ledstring[i] ; 

XChangeFeedbackControl (my_dpy, dials, DvString, fistrfc) ; 
} 



return; 
} /* End of Sensitizewindow */ 

/* End of stereo demo.c */ 



C 



C 



A -24 1.3.1 Release Notes 



